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INTRODUCTION 

The Intel® MCS-48 family of microcomputers marked 
the first time an eight bit computer with program 
storage, data storage, and I/O facilities was available on 
a single LSI chip. The performance of the initial 
processors in the family (the 8748 and the 8048) has 
been shown to meet or exceed the requirements of most 
current applications of microcomputers. A new member 
of the family, however, has been recently introduced 
which promises to allow the use of the single chip 
microcomputer in many application areas which have 
previously required a multichip solution. The In- 
tel® 8049 virtually doubles processing power available 
to the systems designer. Program storage has been in- 
creased from 1K bytes to 2K bytes, data storage has 
been increased from 64 bytes to 128 bytes, and process- 
ing speed has been increased by over 80%. (The 2.5 
microsecond instruction cycle of the first members of 
the famiiy has been reduced to 1.36 microseconds.) 

It is obvious that this increase in performance is going 
to result in far more ambitious programs being written 
for execution in a single chip microcomputer. This ar- 
ticle will show how several program modules can be 
designed using the 8049. These modules were chosen 
to illustrate the capability of the 8049 In frequently en- 
countered design situations. The modules included are 
full duplex serial I/O, binary multiply and divide routines, 
binary to BCD conversions, and BCD to binary conver- 
sion. It should be noted that since the 8049 is totally 
software compatible with the 8748 and 8048 these 
routines will also be useful directly on these proc- 
essors. In addition the algorithms for these programs 
are expressed in a program design language format 
which should allow them to be easily understood and 
extended to suit individual applications with minimal 
problems. 


however, is more economic than technical; these same 
peripheral chips which are such a bargain when coupled 
to a microprocessor such as the MCS-85 or 86, have a 
significant cost impact on a single chip microcomputer 
based system. The high speed of the 8049, however, 
makes It feasible to implement a serial link under soft- 
ware control with no hardware requirements beyond two 
of the I/O pins already resident on the microcomputer. 

There are many techniques for implementing serial I/O 
under software control. The application note “Applica- 
tion Techniques for the MCS-48 Family” describes 
several alternatives suitable for half duplex operation. 
Full duplex operation is more difficult, however, since it 
requires the receive and transmit processes to operate 
concurrently. This difficulty is made more severe if it is 
necessary for some other process to also operate while 
serial communication is occurring. Scanning a keyboard 
and display, for example, is a common operation of 
single chip microcomputer based system which might 
have to occur concurrently with the serial receive/trans- 
mit process. The next section will describe an algorithm 
which implements full duplex serial communication to 
occur concurrently with other tasks. The design goal 
was to allow 2400 baud, full duplex, serial communica- 
tion while utilizing no more than 50% of the available 
processing power of the high speed 8049 microcom- 
puter. 

The format used for most asynchronous communication 
is shown in Figure 1 . It consists of eight data bits with a 
leading ‘START bit and one or more trailing ‘STOP’ bits. 
The START bit is used to establish synchronization be- 
tween the receiver and transmitter. The STOP bits en- 
sure that the receiver will be ready to synchronize itself 
when the next start bit occurs. Two stop bits are nor- 
mally used for 110 baud communication and one stop 
bit for higher rates. 


FULL DUPLEX SERIAL 
COMMUNICATIONS 

Serial communications have always been an important 
facet in the application of microprocessors. Although 
this has been partially due to the necessity of con- 
necting a terminal to the microprocessor based system 
for program generation and debug, the main impetus 
has been the simple fact that a large share of micro- 
processors find their way into end products (such as in- 
telligent terminals) which themselves depend on serial 
communication. When it is necessary to add a serial link 
to a microprocessor such as the Intel® MCS-85 or 86 the 
solution is easy; the Intel® 8251 A USART or 8273 SDLC 
chip can easily be added to provide the necessary pro- 
tocol. When it is necessary to do the same thing to a 
single chip microcomputer, however, the situation 
becomes more difficult. 

Some microcomputers, such as the Intel 8048 and 8049 
have a complete bus interface built into them which 
allows the simple connection of a USART to the proc- 
essor chip. Most other single chip microcomputers, 
although lacking such a bus, can be connected to a 
USART with various artificial hardware and software 
constructs. The difficulty with using these chips. 


START STOP 

BIT D1 D2 D3 D4 D5 D6 D7 D8 BIT 



Figure 1. 


The algorithm used for reception of the serial data is 
shown In Figure 2. It uses the on board timer of the 8049 
to establish a sampling period of four times the desired 
baud rates. For 2400 baud operation a crystal frequency 
of 9.216 MHz was chosen after the following calculation: 


f = 480N(2400)(4) 

where 480 is the factor by which the crystal fre- 
quency is divided within the processor 
to get the basic interrupt rate 
is the desired baud rate 
is the required number of samples per 
bit time . 

is the value loaded into the MCS-48 
timer when it overflows 


2400 

4 


N 
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The value N was chosen to be two (resulting in f = 9.216 
MHz) so that the operating frequency of the 8049 could 
be as high as possible without exceeding the maximum 
frequency specification of the 8049 (11 MHz). 


START OF RECEIVE ROUTINE 


1 IF RECEIVE FLAGS0 THEN 

2 IF SERIAL INPUT^SPACE THEN 

3 RECEIVE FLAG:=1 

3 BYTE FINISHED FLAG: =0 

2 ENDIF 

1 ELSE SINCE RECEIVE FLAG=1 THEN 

2 IF SYNC FLAG=« THEN 

3 IF SERIAL INPUT=SPACE THEN 

4 SVNC FLAG:=1 

4 DATfi:=80H 

4 SAMPLE CNTR:=4 

3 aSE SINCE SERIAL INPUT=MARK THEN 

4 RECEIVE FLAG:=0 

3 ENDIF 

2 ELSE SINCE SVNC aA6=l THEN 

3 SAMPLE COUNTER -SAMPLE COUNTER-1 

3 IF SAMPLE COUNTER=0 THEN 

4 SAMPLE C0UNTER:=4 

4 IF BV7E FINISHED aAG=8 THEN 

5 CARRV:=SERIAL INPUT 

5 SHIFT DATA RIGHT HITH CARRY 

5 IF CARRV=i THEM 

6 OKDATR;=OATA 

6 IF DATA READY aHG=0 THEN 

7 BYTE FINISHED FLAG=1 

6 asE 

7 BYTE FINISI€D FLAG:=1 

7 OVERRUN aAG:=l 

6 ENDIF 

5 ENDIF 

4 ELSE SINCE BYTE FINISHED FLA6=1 TICN 

;5 IF SERIAL INPUT=MARK THEN 

.6 DATA READY FLAG: =1 

5 ELSE SINCE SERIAL INPUT=SPACE THEN 

6 ERROR aAG;=l 

5 ENDIF 

5 RECEIVE FLAG:=0 

5 SVNC FLAG:=0 

4 ENDIF 

3 ENDIF 

2 ENDIF 
1 ENDIF 

Figure 2 


The timer interrupt service routine always loads the 
timer with a constant value. In effect the timer is used to 
generate an independent time base of four times the re- 
quired baud rate. This time base is free running and is 
never modified by either the receive or transmit pro- 
grams, thus allowing both of them to use the same 
timer. Routines which do other time dependent tasks 
(such as scanning keyboards) can also be called periodi- 
cally at some fixed multiple of this basic time unit. 

The algorithm shown in Figure 2 uses this basic clock 
plus a handful of flags to process the serial input data. 


Once the meaning of these flags are understood the 
operation of the algorithm should be clear. The Receive 
Flag Is set whenever the program is in the process of 
receiving a character. The Synch Flag is set when the 
center of the start bit has been checked and found to be 
a SPACE (if a MARK is detected at this point the receiver 
process has been triggered by a noise pulse so the pro- 
gram clears the Receive Flag and returns to the idle 
state). When the program detects synchronization it 
loads the variable DATA with BOH and starts sampling 
the serial line every four counts. As the data is received 
it is right shifted into variable DATA; after eight bits 
have been received the initial one set into DATA will 
result in a carry out and the program knows that it has 
received all eight bits. At this point it will transfer all 
eight bits to the variable OKDATA and set the Byte 
Finished Flag so that on the next sample it will test for a 
valid stop bit instead of shifting in data. If this test is 
successful the Data Ready Flag will be set to indicate 
that the data is available to the main process. If the test 
Is unsuccessful the Erfor Flag will be set. 

The transmit algorithm is shown in Figure 3. It is exe- 
cuted immediately following the receive process. It is a 
simple program which divides the free running clock 
down and transmits a bit every fourth clock. The variable 
TICK COUNTER is used to do the division. The Transmit- 
ting Flag indicates when a character transmission is in 
progress and is also used to determine when the START 
bit should be sent. The TICK COUNTER is used to deter- 
mine when to send the next bit (TICK COUNTER MOD- 
ULO 4 = 0) and also when the STOP bits should be sent 
(TICK COUNTER = 9 4). After the transmit routine com- 
pletes any other timer based routines, such as a key- 
board/display scanner or a real time clock, can be 
executed. 


START OF TRANSMIT ROUTINE 


;1 

;1 TICK COUNTER -TICK COUNTER+1 

il IF TICK COUNTER MOD 4*0 THEN 

;2 IF TRANSMiniNG aRG=l THEN 

; 3 IF TICK COUNTER=60 1010 66 BINARY THEN 

;4 TRANSMITTING FLAG; *0 

;3 aSE IF TICK COUNTER*00 1001 60 BINARY TICN 

.4 SEND END MARK 

;4 TRANSMiniNG FLAG:*0 

;3 ELSE SINCE TICK COUNTEROTHE HBOVE COUNT THEN 

i4 SEND NEXT BIT 

;3 ENDIF 

;2 ELSE SINCE TRANSMiniNG aAG*0 THEN 
;3 IF TRANSMIT REQUEST aAG=l THEN 

;4 XMTBVT;=NXTBVT 

;4 TRANSMIT REQUEST aAG;=0 

;4 TRANSMITTING aAG:*l 

i4 TICK COUNTER :=0 

;4 SEND SVNC BIT (SPACE) 

;3 ENDIF 

;2 ENDIF 

;1 ENDIF 

Figure 3 
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Figure 4 shows the complete receive and transmit pro- 
grams as they are implemented in the instruction set of 


the 8049. Also included in Fig. 4 is a short routine which 
was used to test the algorithm. 


Mi:.S“48.'ijpi-4i mm rs^embler, v2 0 


SOURCE STRTEf€NT 


2 ■* * 

3 THIS PRiJjRflh TESTS THE FULL LmEK DmiNICftTION SUFTWHRE ♦ 

4 i + * 

6 . 

7 IINCLUDEC FI IMEST PCD 
= ?, : 

= 9 • STPRT (W fEST ROUTINE 

= 10 , ===================== 

= il 

= 12 . 

= 11 . 

= 14 i 

= 15 : 

= 16 • 1 ERPC«: COUNT =0 
= 17 a REPERT 
= 18; 2 PflnERN:=8 

= 19 ;2 INITIRUZE TIHER 

= 28 ; 2 CLERR’ FLRGBVTE 

= 21 . 2 FLflGl=f1flPK 

= 22 :2 REPERT 

= 23 ; 3 IF TRRNSMIT REQUEST FLfiij=8 THEN 
= 24 .4 NaTBVTE:=PRTTERN 

= 25 - 4 TRANSMIT REQLtST FLRG=1 

= 26 3 ENDIF 

= 27 ; 3 IF DRTR RERDV FLRG=i THEN 
= 28 .4 PRTTERN =0KDRTR 

= 29 ;4 DRTR RERDV rLRG =0 

= 30;3 ENDIF 

= 31-2 UNTIL ERROR FLAG OR OVERRUN FLAG 
= 32 ; 2 INCPEOT ERROR dXlNT 
= 33 ; 1 UNTIL FOREVER 

= 34 Eijf 

35 TEJECT 

36 ORG 0 

37 i 1 SELECT REGISTER BANK 8 

38 SEL RB0 

39 ; 1 GOTO TEST 

40 IMF TEST 

41 $ INCLUK(.F1 IJRRT> 


fiSVHCt«<imiS RECEIVE/TRANSMIT ROUTINE 

THIS RiXlTII€ RECErVES SEF:inL DTDE USING PIN TO AS RXD 

AND C0NCURREN1LV TRANSMITS USIWj PIN P27 

NOTE, 

THIS ROUTINE USES FLAG 1 TO BUFFER THE TRANSMITTED 
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LOC OB T sm SOURCE STATEMENT 

= 50 .1 t)ATA LIME. THIS ELIMINATES THE JITTER THAT 
= 51 1 WOULD BE CAUSED BV‘ VARIATIONS IN THE RECEIVE 
= 52 1 TIMING NO OTHER Pfc’OGRAM flAV USE FLAG 1 WHILE 
= 53 .1 THE TIMER INTERRUPT IS DiABLED 



= 

54 .. 





r 

55 i 





= 

58 . 
57 . 





= 

58 . 






59 : 

REGISTER RSSIGNMLNTS-BRN^a 


= 

60 . 

====== 

=========== 

======= 



61 . 






62 = 




0007 

- 

63 ATEMP 

EQU 

R7 

USED TO SA'-it AiXUMl.lLflli3R CONTENTS DURING INTERRUPT 


- 

64 FLGBV7 

EQIJ 

P6 i 

XiNTRINS VARIOUS FLAGS USED 10 CONTRa IKE RECEIVE 


- 

65 



AND TRANSMIT PROCESS. SEE CONSTANT aFINITIONS FOR 


- 

66 



THE MEANING OF EACH BIT 

0005 

- 

67 SAMCTR 

EQU 

F-S 

SfWPLE COUNTER FOR THE RECIEVE HROCESS 

0004 

= 

68 TCKCTP 

EQU 

R4 

SfmPLE CaWTEF FOP THE TRfINSMIT PROCESS 

TOOT 

= 

69 REI50 

m 

R0 ; 

USED AS POINTER REGISTER 


= 

71 : 

RAM ASSIGNMENTS 




a • 

73 i 




0020 

= 

74 MlXDRT 

EOU 

20H 

RECEIVE RETURNS VHLID DfiTfl IN THIS BYTE 

0021 

s 

75 MOATR 

EQU 

21K 

RECEIVE fiCa»!ULfiTES DflTH IN THIS BYTE 

0022 

= 

76 MXMTBV 

EQU 

22H 

CONTAINS BYTE BEING TRaNSNIlTED 

0023 

= 

77 MNXTBV 

EQU 

23H ; 

CONTAINS TW NKT BYTE TO BE TRANStllTTEO 


= 

78 lEJECT 





~ 

79 f 

80 ; 





= 

81 .- 
O') • 

CONSTANTS 




83 .: 





= 

34 ; 

THE FaLOWING CONSTANTS m USED TO ACCESS THE FLAG BITS CONTAINED 



85 ; 

IN REGISTER FLGEVT 

0001 


Ot> t 

87 RCVFLG 

EQU 

01H 

SET WHEN START BIl IS FIRST DETECTED 


= 

88 



RESET WHEN RECEIVE PRiXESS IS COMPLETE 

0002 

= 

89 SVNFLG 

EQU 

02H 

S€T WHEN START BIT IS VERIFIED 


- 

90 



RESET WHEN RECEIVE PR^ESS IS COMPLETE 

0004 

- 

91 BVFNFL 

Eai 

94H 

RESET WHEN STRP:T BIT IS FIRST DETECTED 


- 

92 



SET WHEN THE EIGHT DATA BITS HAVE aL KEN RECEIVED 

0008 

= 

93 DRDVfL 

b»XI 

88H 

SmXILD BE RESET BV MAIN PROGRAM WHEN DATA IS acEPTED 


= 

94 



SET BV RECEIVE PRiXESS WHEN STOP BIT(S.^ ARE VERIFIED 

0010 

- 

95 ERRaO 

EQU 

10H 

SHOIXD BE RESET BV MAIN PROGRAM WHEN SAMPLED 


= 

96 



^T BV REC-EIVE PRXESS IF A FRAMING ERROR IS DETECTED 

0020 

- 

97 TRRQFL 

EQU 

20H 

TESTED BV MAIN PROijRRM TO DETERMINE IF REfltiV TO 


= 

98 



TRANSMIT A r€W BVTE-SET TO INDICATE THAT NXTBVT 



99 



HAS BEEN LOAECD 


= 

100 



RESET BV TRAHSHIT PRXESS HHEN BYTE IS HaEPTED 

0040 

= 

101 TRNGFL 

EQU 

40H 

SET WHEN TRANSMISSION OF A BVTE STARTS 


= 

102 



RESET WHEN STOP BIT IS TRANSMITTED 

0080 

= 

103 OVRt.lN 

Eai 

80H 

SET BV RECEIVE PROCESS HHEN OVERUN XCURRS 



104 



SHOIXD BE RESET BS' MAIN PROGRAM HXN SAM^ED 


Figure 4 (continued) 
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LOC OB J SEQ SOmSrCE STRTEMENT 

= 105 ; 

= 106 ^ GEKERfiL CmSTflNTS 
= 108 , 


0080 

FF7F 

Wto 

= 109 flRRK 
= 110 SPRCE 
= 111 STPBTS 
= 112 
= 112 
= 114 ; 

= 115 lEJECT 
= 116 . 

= 117 
- 

EQIJ 

m) 

EQU 

STRRT 

80H ^ USED TO IjENERRTED R MARK 

NOT 80H .. USED TO GENERATE fl SPACE 
0 : CONTROLS THE NUMBER OF SH2P BITS 

0 GENERATES ONE STOP BI1 

1 GENERATES TWO STOP BITS 

OF RfCEIVE/TRANSMIT INTERRUPT SERVICE ROUTINE 


= 119 



000? 

= 120 

ORG 

0007H 


= 121 




= 122 ;1 ENTER INTERRLtPT MODE 

1 

1 

= 123 TISR 

JTF 

URRT 

0003 92 

= 124 

RETR 


000fl D5 

= 125 HRF‘T: 

SEL 

RBI 


= 126 . 1 SfiVE flCCUmXRTOR COf^TENTS 

0008 RE 

= 127 

MOV 

RTEMP.A 


= 128 rl RELOAD TIMER 

000C 22FE 

= 129 

MOV 

r..#timi:nt 

000E 62 

= 120 


T.M 


= 131 ; 




= 132 

OUTPUT TXD BUFFER (Fl> TO TXD I.Tj LU€ (P27) 


= 133 ; 




= 134 ; 



000F 7615 

= 135 

JFl 

omark; 

0811 9R7F 

= 136 OSPfiCE 

RNL 

P2.#SPflCE 

0012 0417 

= 137 

-IMP 

RCV000 

0815 3R80 

= 138 OflRRK 

- -170 • 

ORL 

P2..#MARK 


= 140 ; 

STRRT OF RECEIVE ROUTINE 


= 141 ; 

===== 

=============== 


= 142 : 




= 143 :>i IF RECErTE FLRG=8 Tf€N 

0017 FE 

= 144 RCV000 

; MOV 

aaoBVT 

0013 1224 

= 145 

JB0 

RCV018 


= 146 ; 2 

IF SERIAL INPUT=SPRCE THEN 

801H 2664 

= 147 

JT0 

XMIT 


= 148 ;2 

RECEIVE FLRG;=1 

001C FE 

r 149 

MOV 

R.FLijB‘t'T 

001D 4301 

= 150 

ORL 

A, #RCVFLG 


= 151 ..3 

BVTE FINISHED FLAG:=0 

001F 52FB 

= 152 

RNL 

a#NOT B'lfNFL 


= 152 . 2 

ENDIF 


0021 RE 

= 154 

MOV 

FLGBVLA 

0022 0464 

= 155 

JMP 

XMIT 


= 156 ; 1 ELSE SINi:E RECErvt FLRG=i THEN 


= 157 2 

IF SVNC FLRG=0 THEN 

0024 2228 

= 158 RCV010 

JBl 

RCV030 


= 153 ; 2 

IF S 

ERiAL input=spri:::e then 


Figure 4 (continued) 
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lch: OBJ 

SE0 

S0I.IRC.E STHTEHENT 

0026 3653 

= 160 

TT0 

RC’veze 


= 161 4 


SVTK FLHQ =1 

002ft 4302 

= 162 

OFl 

fl..#S‘7NFLG 

002fl HE 

= 163 

Mcrv 

FLGBVT.fl 


= 164 . 4 


DflTft;=80H 

002B BS21 

= 165 

m 

R0,#MDflTH 

002D B0S8 

= 166 

IH3V 

0R0. #80H 


= 167 ; 4 


SAMPLE I3NTR =4 

002F BC'04 

= 168 

fiov 

SHMCTR..#4 

003:1 04€4 

= 169 

JMF 

XMIT 


= 170 :< 

ELSE SINC:E SERIHL INPUT=I1HRK THEN 


= 171 .;4 


RECEIv'E FLHij =0 

0033 53FE 

= 172 PCV020: HNL 

ft, INOT RCVFLG 


= 173 .3 

ENOIF 

0035 HE 

= 174 

HOV 

FLGE:VLfi 

0i?36 0464 

= 175 

JMP 

XMIT 


= 176 2 

ELSE 

SINC:E SVW: PLftG=l THEN 


= 177 ,3 

SftMPLE COUNTER =Sfil1ftLE COUNTER*! 

0030 ED64 

= 178 RCV030 DJNZ SflMCTR.XWiT 


= 179 ,.3 

IF 

SRMPLE CC«.JN1ER=0 THEN 


= 180 ..4 


SftMPLE COUNTER =4 

003R BD84 

= 181 

MOV 

SflMC;TR,#4 


= 182 ;4 


IF BVTE FINISHED FLh6=0 THEN 

003C 525.9 

= 183 

JB2 

RCV050 

003E 97 

= 184 

CLR 

C 


II 

1^ 

S 


CftRRV =SERia INPUl 

003F 2642 

= 186 

JNT0 RCV048 

0041 H7 

= 187 

CPL 

c 

0042 6821 

= 188 RCV040 m.f 

R0, #Mt>ftTft 

0044 F0 

= 189 

MOV 

ft..0R0 


= 190 ^5 


SHIFT DflTft RIGHT WITH CftRRV 

0045 67 

= 191 

RRC 

ft 

0046 m 

= 192 

MOV 

i?R0,ft 


= 193 ,;5 


IF i;:ftR!RV=l THEN 

0047 E664 

= 194 

JNC 

XMIT 


= 195 ,i6 


iM^Tfl =DftTft 

0049 B820 

= 1% 

MOV 

RCi.#M»DflI 

0048 m 

= 197 

m! 

0R0..ft 


= 198 .-6 


IF DflTft REflDV FLftG=0 IHEN 

004C FE 

= 199 

MOV 

ft..FLGB'fr 

0040 7254 

= 200 

JB3 

RCV045 


= 201 .7 


BVTE FINISHED FLRG=1 

004F 4304 

= 202 

ORL 

R,#BVFNFL 

0051 HE 

= 283 

MOV 

FLGBVT.fl 

0052 0464 

= 204 

JMP 

XMIT 


= 205 


ELSE 


= 206 ;7 


BYTE FINISHED FLfti3:=i 


= 207 .7 


fMmjH FLftG :=l 


= 208 RCV045; 



= 209 

;MOV 

fl..FLGBVT 

0054 4384 

= 210 

ORL 

ft..#<BVFNFL W OVRUN) 

0056 HE 

= 211 

MOV 

FLGBVT.fl 


= 212 ;6 


ENDIF 


= 213 i5 


ENDIF 

0057 0464 

= 214 

JMP 

XMIT 


Figure 4 (continued) 
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Loc m 

SEQ S0l.lF‘CE STATEMENT 


= 215 i4 

asf SI»:E B’VTE FIN1£4€D FLftG=l im 


= 216 .;5 


IF SERIAL INPUT=MARK THEN 


= 217 RCV050: 

JNT0 

RCV060 


= 218 ..6 


DATA READY FLAG;=1 

0056 4308 

= 219 


A, IDRD’VFL 

005(> 0461 

= 220 

■JMP 

RCV070 


= 221 5 


ELSE SINCE SERIAL INPUT=SPfli:E THEN 


= 222 6 


ERROR FLft3.=l 

005F 4110 

= 223 RCV060 

ORL 

A..#ERRFLG 


= 224 . 5 


ENDIF 


= 225 .5 


RECEIVE IlAG.=0 


= 226 i 5 


SVNC; FLAG;=0 

0061 52FC 

= 227 RCV070 

HNL 

A.#NOT<SVNFLG OR RCVFLG) 

0063 HE 

= 228 

MOV 

FLGB-t’LA 


= 229 ; 4 

ENDIF 


= 238 3 

ENDIF 


= 231; 2 ENDIF 



= 232 1 EN[‘IF 



= 233 fEJECT 




= 234 ; 




= 235 : 

START 53F transmit ROUTINE 


= 236 ; 

==== 

==========:========== 


= 237 ; 




= 238 ;1 




= 239 

; TRANSMITTER OUTPUT BIT IS P2-7 


= 240 ;1 TICK CaiNTER.=TICK CaWTER+l 

0064 1C 

= 241 XMIT: 

INC 

TCKCTR 


= 242 .1 IF TICK fJOUNTER MOD 4=9 THEN 

0065 2303 

= 243. 

MOV 

ft.#03H 

0067 5C 

= 244 

ANL 

A, TCKCTR 

9060 9697 

= 245 

JNZ 

FETUR:N 


= 246 i 2 

IF TRANSMITTING FLAG=1 TIEN 

006ft FE 

= 247 


A^FLGBYT 

006B 37 

= 248 

CPL 

A 

006C D286 

= 249 

JB6 

XMT040 


= 250 

IF STPBTS EQ 1 


= 251 ; 3 

IF im COUNTER=80 1810 00 BINARY THEN 


= 252 

MOV 

a#28H . CONDITIONAL ASSEMBLV 


= 253 

XRL 

A, TCKCTR ; 


= 254 

JN2 

XMT010 ; 


= 255 .:4 


TRANSMITTINij FLAG =9 


= 256 

MOV‘ 

A, FLG6VT ; 


= 257 

ANL 

A..#N0T TRWjFL 


= 253 

MOV 

FLGBYLA 


= 259 

.IMP 

RETURN i 


= 260 

ENDIF 


= 261 .. 3 

ELSE IF TICK CO»JNTER=00 1081 00 BINARY THEN 

006E 2324 

= 262 XMT010 

; MOV 

A.«24H 

0070 [>C 

= 263 

XRL 

A.. TCKCTR 

0071 967B 

= 264 

JNZ 

mm 


= 265 4 


SEf«> END MARK 

0073 H5 

= 266 

CLR 

FI , SET FLAIjI to mark 

9074 85 

= 267 

CPL 

FI 


= 263 

IF STPBTS EQ 8 


= 269 ;4 


TRANSMITTING FLAG =9 


Figure 4 (continuecO 
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LOC OBJ 

SEQ SOURCE STATEMENT 

0075 FE 

= 270 

MOV 

A,FLGBVT ; CONDITIONAL ASSEH6LV 

0076 52BF 

= 271 

ANL 

A,#NOTTRNGFL 

0078 flE 

II 

MOV 

FLGB'i'LA 

0079 0497 

= 272 

JMP 

RETURN i 


= 274 

ENDIF 



= 275 2 

ELSE 

SINCE TICK COUNTEROTHE ABOVE COUNT THEN 


= 276 ,:4 

SEND NEXT BIT 

007B m2 

= 277 XMT020: 

MOV 

R0..IMXMTB*? 

8070 F0 

= 278 

MOV 

A..0R0 

007E 67 

= 279 

RRC 

A 

007F 00 

= 280 

MOV 

0R0..A 

0080 R5 

= 281 

CLR 

FI ; FLAG 1 MILL BE USED TO BUFFER TXD 

0081 E697 

= 282 

JNC 

RETURN ; GO TO REPJRN POINT IF TXD=SPACE (0) 

0082 85 

= 282 

CFl 

FI ; ELSE COMPLEMENT FLAG 1 TO A MARK 

0084 0497 

= 284 

JMP 

RETURN 


= 285 

ENDIF 



= 286 .; 2 ELSE SINCE TRANSMITTING f-L0G=8 THEN 


= 287 ,;2 

IF TRAHSnr REQUEST FLAG=1 THEN 

0086 B297 

= 288 XMT040: 

JB5 

RETURN ;FLAG BVTE THERE 


= 289 ;4 

XMTBVT:=NXT8VT 

0088 8822 

= 290 

MOV 

R0, #MNXTBV 

008R F6 

= 291 

MO*V 

A,0R0 

008B 8822 

= 292 

MOV 

R0..#MXMTbV 

008D 00 

= 292 

MOV 

0R0,A 


= 294 ;4 

TRANSMIT REQUEST aA6:=0 

008E FE 

= 295 

MOV 

A.PLGBVT 

008F 520F 

= 2% 

ANL 

A,#WT mJ9fl 


II 

TRANSMITTING FLAG =1 

0091 4240 

= 298 

ORL 

A..iTRNGa 

0092 0E 

= 299 

MOV 

FLGBVT,A 


= 200 ; 4 

TICK CFJJJNTER =0 

0094 BC00 

= 201 

MOV 

TCKCTR,#8 


= 202 i4 

SEND SVNC BIT (SPACE) 

0096 05 

= 202 

CLR 

FI SET FLAG 1 TO CAUSE A SPACE 


= 204 n 

mif 



= 205,2 Ef®IF 



= 206 , 1 ENOIF 



= 20? RETURN: 




= 208 1 RESTORE ACCUMULATOR 

0097 FF 

= 209 

MOV 

R,ATEMF' 

0098 92 

= 210 

RETR 



211 REJECT 




212 




212 ; 

START OF TEST ROUTINE 


214 , 


============= 


215 ; 



0100 

216 

ORG 

0100H 

FFFE 

217 TIMCNT 

EQU 

-2 

001E 

213 MFLiBV 

EQU 

lEH 

001D 

219 MSAMCT 

EQU 

IDH 

001C 

220 MTCKCT 

EQU 

ICH 


221 



0007 

222 ERRCNT 

EQU 

R7 

uiUCiC 

222 PATT 

EQU 

R6 


224 ; 




Figure 4 (continued) 
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LOC OBJ SE8 SOURCE STflTEHEHT 



325 j 

326 ; 

327 ;1 ERROR COUNT:=0 

0109 BF00 

328 TEST; 

MOV ERRCNL#0 


329 ^1 REPEAT 


338 TLOP; 
331 ;2 

PATTERN :=0 

0102 BE08 

332 

HOV Pfln,i00 


333 ;2 

INITIALIZE TIMER 

0104 23FE 

334 

MOV ft,#TIMCNT 

0106 62 

335 

MOV Lfl 

0107 55 

336 

STRT T 

0108 25 

337 

EN TCNTI 


338 ;2 

aEflR FLflGBVTE 

0109 B81E 

339 

MOV R0,#MFLGBY 

010B B000 

340 

MOV 0R0.I0 


341 2 

aflGl=MflRK 

010D 05 

342 

aP FI 

010E B5 

343 

CPL FI 


344 ;2 

REPEAT 


345 TILOP 

. 


346 j3 

IF TRfiNSMIT REQUEST FLftG=0 THEN 

010F B81E 

347 

MOV Ra#MFLGBV 

0111 F0 

348 

MOV am 

0112 B224 

349 

JB5 TREC 


350 :.A 

NXTBVTE;=PflTTERN 

0114 B923 

351 

MOV RLiMNXTBV 

0116 FE 

352 

MOV aPflTT 

0117 fll 

353 

MOV 0Rl..ft 


354 -j4 

TRANSMIT REQUEST aftG=l 

0118 35 

355 

DIS TCNTI i LOCK OUT TIMER INTERRJJPT 


356 

SO THAT lllTUftL EXCLUSION IS MAINTAINED HHILE 


357 

1HE FLAG BS*TE IS BEING MODIFIED 

0119 F0 

358 

MOV A..0R0 

011ft 4320 

359 

ORL ft. #TRRQFL 

011C ft0 

360 

MOW 0R0jft 

011D 25 

361 

EN TCNTI 

011E 1622 

362 

JTF TESlft 

0120 2424 

363 

JMP TREC 

0122 140ft 

364 TESTft 

CaL UfiRT ; Cfla IWRT BECAUSE TIMER O'TERFLOHED DURING LOCKOUT 


365 ;3 

ENDIF 


366 j 3 

IF DATA READV FLAG=1 THEN 

0124 F0 

367 TREC. 

368 

MOV am 

0125 37 

369 

CPI A 

0126 7238 

370 

JB3 TRECE 


371 >4 

PATTERN ;=OK:DftTft 

0128 8920 

372 

MOV Rl, #MOKDAT 

012ft FI 

373 

MOV aoRi 

012B ftE 

374 

MOV PATT.A 


375 ,;4 

DATA READV FLAG; =8 

012C 35 

376 

DIS TCNTI i LOCK OUT TII«R INTERRUPT 


377 

SO THAT MUTUAL EXCLUSION IS MRINTIANED WHILE 


378 

; THE FLAG BVTE IS BEING MODIFIED 

012D F0 

3r^ 

MOV am 


Figure 4 (continued) 

All mnemonics copyrighted © Intel Corporation 1979. 
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int^. 

LOC OBJ SEQ SOURCE STATEMENT 


012E 53F7 380 Afl A..#NOT DRDVa 

0130 A0 381 Mtr,' 0R8,A 

0131 25 382 EN TCNTI 

9132 1636 383 JTF TESTB 

0134 2438 384 W TRECE 

0136 148A 3&5 TESTB: CALL UAR’T ; CALL UART IF TIt«R 0*VERFLOHED DURING LOCKrjUT 

386 TRECE; 

387 ;3 ENDIF 

3-88 ;2 UNTIL ERROR FLAG OR 0\€RRUN FLAG 


0138 F0 

389 

MOV 

A,0R0 

0139 5390 

390 

ANL 

A, tMO'VRUN OR ERRFLG) 

0136 C60F 

391 

..17 

IILOP 


392 

i2 INCREMENT ERROR COUNT 

013D IF 

393 

irc 

ERRCNT 


394 

.1 UNTIL FOREVER 

013E 2402 

395 

JMF 

TLOP 


3% ;EOF 
397 END 


USER SYMBOLS 

ATEMP 0007 BVFNFL 0094 
MFLGBV 001E MNXTBV 9923 
OVRUN PATT 0096 
RCV959 0059 RCV069 905F 
STPBTS 0000 SVNFLG 9082 
TISR 0007 TLOP 0102 
XMT010 006E XMT020 997B 


DRDVTL 0008 ERRCNT 9007 

MOKDAT 0020 MSAMCT 901D 

RCV000 8017 kcveie 0024 

RCV070 0061 RCVRG 9001 

TCKCTR 0004 TEST 8180 

TREC 0124 TRECE 0138 

XMT040 0086 


ERRFLQ mid FLG8VT 0996 
MTCKCT 001C MXMTBV 0922 
RCV020 0033 RCV030 0038 
REG0 0000 RETURN 0897 
TESTA 0122 TESTB 9136 
TRNOa 8040 TRRQFL 8029 


IfflRK 0080 MDATA 0821 
OtIARK 0015 OSPACE 9011 
RCV040 0042 RCV045 8954 
SAMCTR 0005 SPACE FF7F 
TILiTP 010F HMCNT FFFE 
UART 000A XMIT 9064 


ASSEMBLY COMPLETE, NO ERRORS 

Figure 4 (continued) 

All mnemonics copyrighted © Intel Corporation 1979, 

MULTIPLY ALGORITHMS of code size or execution time is important, however, it 

Most microcomputer programmers have at one time or ‘s necessary to be reasonabiy familiar with the multipli- 

another implemented a multiply routine as part of a "^^t appropriate optimizations for the 

larger program. The usual procedure is to find an algo- rnachine being used can be made, 

rithm that works and modify it to work on the machine To understand how multiplication operates in the binary 

being used. There is nothing wrong with this approach. number system, consider the multiplication of two four 

If engineers felt that they had to reinvent the wheel bit operands A and B. The “ones and zeros” in A and B 

every time a new design is undertaken, that’s probably represent the coefficients of two polynomials. The 

what most of us would be doing— designing wheels. If operation Ax B can be represented as the following 

the efficiency of the multiply algorithm, either in terms multiplication of polynomials: 


A3*2^ 

+ 

A2*2^ 

+ 

A1*2^ 

+ 

AO *2° 

X B3*2^ 

+ 

B2*2^ 

+ 

B1*2^ 

+ 

BO *2*^ 

+ B0A3*2^ 

+ 

B0A2*22 

+ 

B0A1*2^ 

+ 

B0A0*2° 


+ B1A3*2^ + B1A2*2^ + B1A1‘22 + B1A0*2^ 

+ B2A3*2^ + B2A2*2^ + B2A1*2^ + B2A0*22 

+ B3A3*2^ + B3A2*2® + B3A1*2^ + B3A0*2^ 
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The sum of all these terms represents the product of A 
and B. The simplest multiply algorithm factors the 
above terms as follows: 

A*B= B0*(A)*2°+ B1*(A)*2^ + B2*(A)*22+ B3*(A)*2^ 

Since the coefficients of B (i.e., BO, B1, B2, and B3) can 
only take on the binary values of 1 or 0, the sum of the 
products can be formed by a series of simple adds and 
multiplications by two. The simplest implementation of 
this would be: 

MULTIPLY: 

PRODUCT =0 

IFB0=1 THEN PRODUCT: = PRODUCT + A 
IFB1 = 1 THEN PRODUCT:=PRODUCT+2*A 
IFB2=1 THEN PRODUCT: = PRODUCT + 4* A 
IFB3=1 THEN PRODUCT: = PRODUCT + 8* A 
END MULTIPLY 

In order to conserve memory, the above straight line 
code is normally converted to the following loop: 

MULTIPLY: 

PRODUCT: = 0 
COUNT: = 4 
REPEAT 

IF B{0]=1 THEN PRODUCT: = PRODUCT + A ENDIF 
A: = 2* A 
B: = B/2 

COUNT: = COUNT- 1 
UNTIL COUNT: = 0 
END MULTIPLY 

The repeated multiplication of A by two (which can be 
performed by a simple left shift) forms the terms 2*A, 
4*A, and 8*A. The variable B is divided by two (per- 
formed by a simple right shift) so that the least signifi- 
cant bit can always be used to determine whether the 
addition should be executed during each pass through 
the loop. It is from these shifting and addition opera- 


tions that the “shift and add” algorithm takes its com- 
mon name. 

The “shift and add” algorithm shown above has two 
areas where efficiency will be lost if implemented in the 
manner shown. The first problem is that the addition to 
the partial product is double precision relative to the 
two operands. The other problem, which is also related 
to double precision operations, is that the A operand is 
double precision and that it must be left shifted and 
then the B operand must be right shifted. An examina- 
tion of the “longhand” polynomial multip ication will 
reveal that, although the partial product is indeed dou- 
ble precision, each addition performed is only single 
precision. It would be desirable to be able to shift the 
partial product as It Is formed so that only single preci- 
sion additions are performed. This would be especially 
true if the partial product could be shifted into the “B” 
operand since one bit of the partial product is formed 
during each pass through the loop and (happily) one bit 
of the “B” operand is vacated. To do this, however, it is 
necessary to modify the algorithm so that both of the 
shifts that occur are of the same type. 

To see how this can be done one can take the basic 
multiplication equation already presented: 

A*B= B0*(A*2°)-h B1*(A‘2^)-l- B2*(A*22)-i- B3*(A*2^) 
and factoring 2^ from the right side: 

A*B = 2^[B0*(A*2“^)-l-Br(A*2-3) 

+ B2*(A*2"^)-i-B3*(A*2-‘')] 

This operation has resulted in a term (within the 
brackets) which can be formed by right shifts and adds 
and then multiplied by 2^ to get the final result. The 
resulting algorithm, expanded to form an eight by eight 
multiplication, is shown in figure 5. Note that although 
the result is a full sixteen bits, the algorithm only per- 
forms eight bit additions and that only a single sixteen 
bit shift operation is involved. This has the effect of 
reducing both the code space and the execution time 
for the routine. 


ISIS--II Hi:S-4S/UPI-41 HflCRO fiSSEMBLER.. V2. 0 


LOC i3ej SEQ SOURCE STATEMENT 

1 $mri:rofile 

2 $nCLUDE(;Fl MPV8. HEO) 


= 4 * 

= 5 i * MPV8X8 + 

= 6 ♦ ♦ 


= 8 * 
= 9.* THIS UTILITV PROVIDES AN 8 BV 8 UNSIQfCD MULTIPLV ♦ 

= 10,* AT ENTRV; * 

^ ii A = LONER EIGHT BITS OF DESTINATION OPERAND * 

= 12,* XA= DON'T CARE + 

= 13 , * Rl= POINTER TO SaiRCE OPERAfC^ (MULTIPLIER) IN IN1ERNAL MEMEORV * 

Figure 5 

All mnemonics copyrighted © Intel Corporation 1979. 
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int^. 

IOC: oej SEP SOURCE STATEMENT 


= 14 ;* ♦ 

= 15 AT EXIT ♦ 

= 16 ,♦ fl = LONER EIGHT BITS OF RESLtT ♦ 

= 17 .;* XA= UPPER EIGHT BITS OF RESULT * 

= 18 .; + C = SET IF OVERFLOH ELSE CLEARED * 

= 19.;* ♦ 


= 28 **************************4:*****************)»:**«***4;»*«*)«f%«)(r;ii4c4^4i«:i:***«4(«*«»4c«4 

21 ; 

22 .; 

22 liNCLUDE<:Fl;MF'V8 PDU 
= 24ilMF‘V8XS. 

= 25 ..1 MULTIFLiCANt)C15-83 =8 
^ 26 ..1 COUNT . =8 
=27-1 REPEAT 

2S ..2 IF MULTIPLICANDCe]=0 THEN BEGIN 

= 2S .3 l1ULTIPLICANCv=MULTIPLICANCv^ 

= 30 i 2 ELSE 

= 31 .;j: fllLTIPLICflriC115-S3.=MiXTIPLICAI«^[15-8I+«U^ 

= 32 ..3 M}JLTlFlICRrir :=M<XTIFlICRN[>/2 

= 33;2 ENDIF 

= 34:2 COUNT =COUNT-l 

= 35 1 ItNTIL COUNT=e 

= 33 1 END 

3? EQUATES 

79 i ==r=r== 

40 , 

41 Xfl EQIJ R2 

42 cawT Eai R3 

43 ICNT EfAJ R4 

44 

45 DIGPR Eai 3 

46 ; 

47 REJECT 

48 IINCLIIDE(;F1:MF'V8) 

49 :1 MPV8X§' 

58 HFV8X8: 

51 .1 MULTIPLICANDC15-8];=8 

52 MOV XA..#00 

53 .1 Ca»NT:=8 

54 IHTV C0UNL#8 

55 ;1 REPEAT 

56 MPV8LP 

5? ;2 IF MULTIPLICANDt0]=0 THEN BEGIN 

58 JB8 MPV8A 

59 3 MtJLTIPLlCAND: =MULTIPLICAND/2 

60 JCH A.- m 

61 CLR C 

62 RRC A 

63 XCH A.XA 

64 RRC A 

65 DTN2 COUNT- MPV8LP 

66 PET 

67 2 ELSE 

Figure 5 (continued) 

All mnemonics copyrighted © Intel Corporation 1979. 


8002 

mi 

0004 

0003 


0000 6A00 
0002 BB08 


0004 120E 

0006 2R 

0007 97 

0008 67 

0009 2fl 
000A 67 
000B EB04 
000D 83 
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Loc m.} 


SE0 


SOt^E STfiTEMENT 


€B P?F’V8fl 
tS .3 


mXT IPL ICfiNDt 15-8 3 : =IUATia IChW>[ 15-8 34MtXTIPLIER 


000E 2R 

= 

70 



000F 61 

= 

71 

m 

fi,0Rl 

0010 67 


72 

RRC 

fi 

0011 2H 

= 


XCH 

fi.. Xfl 

0012 67 


74 

RPC 

R 

0013 EB04 

= 

75 

DJNZ 

COUNT.. MPVSLP 

0015 83 

= 

76 

RET 



?7 . 3 IHATIPLICfiND ; =«LILTIPLICflND/2 

78 ENDIF 

79 ;2 COIM =C0IJNT-1 

88 1 IMIL caiNr=0 

81 ; 1 END HPVS:<8 

82 END 


USER SVMBOL8 

COUNT 0083 DIGPP Hm ICNT 0084 
fiSSEMBLV COIIPLETE^ NO ERRORS 


MPVSft 08^ MF-VaP 0004 NPV8X8 000« Xft 


0002 


All mnemonics copyrighted © Intel Corporation 1979. 

DIVIDE ALGORITHMS 

In order to understand binary division a four bit opera- 
tion will again be used as an example. The following 
algorithm will perform a four by four division: 


DIVIDE: 

IF 16*DIVISOR>= DIVIDEND THEN 
SET OVERFLOW ERROR FLAG 
ELSE 

IF 8*DIVISOR>= DIVIDEND THEN 
QUOTIENT[3]:=1 

DIVIDEND:= DIVIDEND-8*DIVISOR 
ELSE 

QUOTIENT[3]: = 0 
ENDIF 

IF 4*DIVISOR>= DIVIDEND THEN 
QUOTIENT[2]: = 1 

DIVIDEND: = DIVIDEND - 4*DIVISOR 
ELSE 

QUOTIENT[2]: = 0 
ENDIF 

IF 2*DIVISOR>= DIVIDEND THEN 
QUOTIENT[1]: = 1 

DIVIDEND: = DIVIDEND - 2*DIVISOR 
ELSE 

QUOTIENT[1]: = 0 
ENDIF 

IF rDIVISOR>= DIVIDEND THEN 
QUOTIENT[0]:=1 

DIVIDEND: = DIVIDEND - 1 ‘DIVISOR 
ELSE 

QUOTIENT[0]: = 0 
ENDIF 
ENDIF 
END DIVIDE 


The algorithm is easy to understand. The first test asks 
if the division will fit into the dividend sixteen times. If it 
will, the quotient cannot be expressed in only four bits 
so an overflow error flag is set and the divide algorithm 
ends. The algorithm then proceeds to determine if eight 
times the divisor fits, four times, etc. After each test it 
either sets or clears the appropriate quotient bit and 
modifies the dividend. To see this algorithm in action, 
consider the division of 15 by 5: 


00001111 

-01010000 


00001111 

-00101000 


00001111 

-00010100 


00001 1 1 1 
-00001010 

00000101 

00000101 

-00000101 

00000000 


(15) 

(16‘5) 

Doesn’t fit— no overfiow 


(15) 

(8*5) 

Doesn’t fit— Q[3] = 0 

(15) 

(4*5) 

Doesn’t fit— Q[2] = 0 

(15) 

(2*5) 

Fits-Q[1] = 1 


(15-2*5) 

(1*5) 

Fits— Q[0]=1 


The result Is Q = 0011 which is the binary equivalent of 
3— the correct answer. Clearly this algorithm can (and 
has been) converted to a loop and used to perform divi- 
sions. An examination of the procedure, however, will 
show that it has the same problems as the original mul- 
tiply algorithm. 
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The first problem is that double precision operations are 
involved with both the comparison of the division with 
the dividend and the conditional subtraction. The 
second problem is that as the quotient bits are derived 
they must be shifted into a register. In order to reduce 
the register requirements, it would be desirable to shift 
them into the divisor register as they are generated 
since the divisor register gets shifted anyway. Unfor- 
tunately the quotient bits are derived most significant 
bits first so doing this will form a mirror image of the 
quotient— not very useful. 

Both of these problems can be solved by observing that 
the algorithm presented for divide will still work if both 
sides of all the “equations'* involving the dividend are 
divided by sixteen. The looping algorithm then would 
proceed as follows; 

DIVIDE: 

QUOTIENT: = 0 
COUNT: = 4 

DIVIDEND: = DIVIDEND/16 
IF D1VIS0R>= DIVIDEND THEN 
OVERFLOW FLAG:=1 
ELSE 
REPEAT 

DIVIDEND: =DIVIDEND*2 
QUOTIENT: = QUOTIENT*2 
IF D1VIS0R> = DIVIDEND THEN 
QUOTIENT: = QUOTIENT 1/*SET QUOT1ENT[0]*/ 
DIVIDEND: = DIVIDEND - DIVISOR 
ENDIF 

COUNT; = COUNT -1 
UNTIL COUNT = 0 
ENDIF 
END DIVIDE 


When this algorithm is implemented on a computer 
which does not have a direct compare instruction the 
comparison is done by subtraction and the inner loop of 
the algorithm is modified as follows: 


REPEAT 

DIVIDEND: = DIVIDEND*2 
QUOTIENT: = QUOTIENT*2 
DIVIDEND;= DIVIDEND- DIVISOR 
IF BORROW = OTHEN 
QUOTIENT: = QUOTIENT + 1 
ELSE 

DIVIDEND: = DIVIDEND + DIVISOR 
ENDIF 

COUNT: = COUNT -1 
UNTIL COUNT = 0 


An implementation of this algorithm using the 8049 in- 
struction set is shown in figure 6. This routine does an 
unsigned divide of a 16 bit quantity by an eight bit quan- 
tity. Since the multiply algorithm of figure 5 generates a 
16 bit result from the multiplication of two eight bit 
operands, these two routines complement each other 
and can be used as part of more complex computations. 


ISIS-II MC5-49/IJPM1 MfiCPO ftSSEMBLER,. V2. 8 


LOr OBJ SEQ SOURCE STftTEPIENT 

1 IPIfiCRORLE 

2 ^INCLUDE^Fl DIV16. HEt» 

= 7 < +;f-4++.t*ttf*t*-ii4^1-t+**.1i***;f**.1i****;^**)|tt;f#^*-t*;*****1(*+-.t1f++****+**t** 


= 4 * 

= 5 i* DIV16 * 

= 6 ♦ 


= 0 * 

= 3:.* THIS UTILITV PROVIDES AN 16 BV 8 UNSIGNED DIVIDE * 

= 10.* AT ENTRV: * 

= 11 , A = LOWER EIGHT BITS OF DESTINATION OPERAND * 

= 12 J<fi= IPPEP EIGHT BITS Of DIVIDEND * 

= IT , * Rl= POINTER TO DIVISOR IN INTERNa flEMORV ♦ 

= 14 * 

= 15;+ AT EXIT: * 

= 16;+ A = LOWER EIGHT BITS OF RESULl * 

= 17,* XA= REMAINDER * 


Figure 6 

All mnemonics copyrighted ® Intel Corporation 1979. 
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UX OBJ 


8002 

000.? 


0000 2ft 

0001 BB08 

0002 37 

0004 61 

0005 37 

0006 F60B 

0008 h7 
0008 0424 


000B 61 


SE0 SOURCE STATEMENT 


= 18 , + C = SET IF OVERFLOW ELS£ CLEARED •+ 

= 19 .. * 

21 .- 


2? IINCLUDEC F1:DIV16 PDL> 

= 24-1 DIV16 
= 25 :l DXINT =8 

= 26 1 DIVIDENDE 15-8] <>IVID€N[{ 15-8 3-CaVISi^^^ 

= 2? . 1 IF B0RR0W=8 THEN /* IT FITS*/ 

= 28 ;2 SET OVERFLOW KLftij 
= 29 : 1 ELSE 

= 30 ; 2 RESTORE DIVIDEND 

= 31-2 REPEAT 

= 32.3 DIVIDEND :=DIVIDENC>*2 

= 33 : 3 OUOTIENT =tXh3TIENT*2 

= 34; 3 DIVIDENDE15-8]:=DIVIDENC>E15-8H>IVIS0R 

= 35 . 3 IF B0RR!XJ=1 THEN 

^ 36 ; 4 RESTORE DIVIDEND' 

= 37 ;3 ELSE 
= 38 4 QUCfTILNT[0] =1 

= 39 . : ENDIF 

= 40;3 COUNT =C0UNT-1 
-- 41 : 2 UNTIL C0IHT=8 

= 42 ; 2 CLEAR OVERFLijW FLAG 

= 43 ; 1 ENDIF 

= 44 .1 ENDDIVIDE 

45 • 

46 EQUATES 

47 , ==r.==== 

48 ; 

49 >:a Eai R2 

50 COUNT EQLI R3 

51 ; 

52 REJECT 

53 RINCLUDEf:Fl;DIV16> 

= 54 .1 DIV16. 


= 55 DIV16: XCH A,XA ; RiMINE WCiRKS IHjSTLY WITH £:I IS 15-8 

= 56 ;1 COUNT: =8 

= 57 MOV COUNT.#? 


= 58-1 DIV!I>ENDC15“8]:=DiVIDENC'C15-3H>IVISi3R 


= 59 CPL A 

= 68 m A.0R1 

= 61 CPL A 

= 62 a IF eOR'RGW=0 THEN IT KIIS*/ 
= 63 JC DIVIP 

= 64 : 2 SET overflow FLAG 

= 65 CPI C 

= 66 IMP DIVIB 

= 67 . 1 ELSE 

= 68 DIVIft: 

= 69 2 RESTORE DIVIDEND 

= 70 ADD A..0R1 

^ 71 2 REPEAT 

= 72 DIVILP: 

^ 73 .3 DIVIDEND :=DIVIDEND*2 


Figure 6 (continued) 
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lcb: OBJ 

SEQ 

S0I.IR:CE 5T8TENENT 


= 

'4 .3 

ajOTIEHT =9J0T1EMT*2 

000C 97 

= 

-?c- 

CLR C 

mo 28 

= 

76 

XCH H, X8 

000E F7 

= 

7? 

PLC 8 

000F 28 


78 

>(C:H 8, Xfi 

0018 F7 


79 

PLC fi 

»3011 Em 

= 

80 

JNC DIVIE 

mi's S7 


81 

CPI 8 

0014 61 

= 

32 

8DD 8..0R1 

0815 37 


83 

CPL 8 

0016 0428 


84 

m DIVIC 



35 .? 

DIVIDEW)C 15-3 ] ; ^DIVIDEND! 15-( 

8018 37 


86 DIVIE: 

•X 
1 

9019 61 

= 

87 

HDD H . m 

0018 37 


88 

CPL 8 


= 

89 3 

IF B0RR0W=1 THEN 

081B E629 

= 

90 

JNC DiVIC 


= 

91 .4 

RESTORE bmOEW 

081D 61 


92 

HDD fi. »R:l 

001E 0421 


93 

.W DIVID 



94 .3 

ELSE 


- 

95 DIVIC 



= 

96 4 

QtJOTIENT[0].=l 

0020 18 

= 

97 

INC Kft 


= 

93 3 

ENDIF 


= 

99 :3 

iTjUNT =C0UNT-1 



100 ■ 2 

UNTIL COUNT=0 

0821 EBOC 

= 

101 DIVID 

DJNZ CiJUNT. DIVILP 



102 : 2 

CLERP O’-'ERFLUI^ FLAG 

0023 97 


103 

CLR C 


= 

l^t4 1 ENDIF 



105 .1 ENDC'IVIDE 

0024 2P 

= 

106 DIVIS 

. XCH ft. Xfi 

0025 83 

- 

107 

RET 



108 END 



USER SVMBOIS 

COUNT C100S l>iVlb 8000 DiVIft 8066 DiVIB 8024 
Xfi 0002 

RSSEREIV tONPLETE.. NO ERRr»R;S 


DIVIO 0021 DIVIE 8018 DIVILP 800C 


Figure 6 (continued) 
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BINARY AND BCD CONVERSIONS 

The conversion of a binary value to a BCD (binary coded 
decimal) number can be done with a very straight- 
forward algorithm: 


CONVERT.TOlBCD: 
BCDACCUM:=0 
COUNT: = PRECISION 
REPEAT 

BIN: = BIN * 2 
BCD: = BCD * 2 -i- CARRY 
COUNT: = COUNT - 1 
UNTIL COUNT = 0 
END CONVERT_TO_BCD 


The variable BCDACCUM is a BCD string used to ac- 
cumulate the result; the variable BIN is the binary num- 
ber to be converted. PRECISION is a constant which 
gives the length, in binary bits of BIN. To see how this 
works, assume that BIN is a sixteen bit value with the 
most significant bit set. On the first pass through the 
loop the multiplication of BIN will result in a carry and 
this carry will be added to BCD. On the remaining 
passes through the loop BCD will be multiplied by two 
16 times. The initial carry into BCD will be multiplied by 
2^^ or 32678, which is the “value” of the most significant 
bit of BIN. The process repeats with each bit of BIN 
being introduced to BCDACCUM and then being scaled 
up on successive passes through the loop. Figure 7 
shows the implementation of this algorithm for the 
8049. 
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inl^. 

I51S-U MCS-4S/IJPI-41 HfCRO flSSe«BLER. V2 8 

UX iXJ Sf Q SOURCE STftTtMENl 

1 lllfiCROFILE 

2 JINCUIDE^ Fl CimO HED> 

= 7 . !^..+s*#**+M-'»i* + **:^t+**5<t#***4;*+**++%*4t*^ciMt++:f*-i:-************:*;4i++**+-+tit **;+:^-i|.+'**;|:***:f* 


= 4 I 4^ if: 

= 5 ;* coNe*:r> * 

= b ♦ 

s 7 ; *====r======-==:=======:=s====rr========i:============s===================i===+ 

= s ;♦ + 

= 3 -’* THIS UTILITV CONVERTS A 16 BIT 6INRRVV‘flL»X 10 BCD * 

= 10 ..* HI ENTRV * 

= 11.:* fl = LOWER EIGHT BUS JX BINflRV mt * 

= 12.;* XR= fXPER EIGHT BUS OF BINflPYVHUt * 

= IS . * R0= POINTER TO H FflCKED BCD STRING * 

= 14 * 

= 15 ,;* HT EKIT * 

= 16;* R = UNDEFINED ♦ 

= 17 ; * ;<P= UNDEFINED * 

= 18 : ♦ C = SET IF OVERFLOW aSE ilERRED * 

= 19 ;♦ ♦ 


= 20 i ****:|:**f*.1i**#+^*++*++;W*+*if.*4t.k)|!******j|c:|c|:*ilt***!|t*:f(*4i**+f.****+.f:;f::f..+*:f;*ii:*3|«***5|e+**** 

21 : 

22 . 

23 IINCLUDE( FI CONBCD Pa> 

= 24 . 1 CONVERT.TO.BCD 
= 25 i 1 KDflCC =0 
= 26 .. 1 COUNT =16 
= 27 1 REPEftT 
= 23 ;2 BIN:=BIN*2 

= 29 .2 a:D =BCD*2+CflRRV 

= 30; 2 IF CflRPV FROM BCDflCC GOTO ERRiX EXIT 

= 31 ;2 JX».INT;=CaWT-l 

= 32 .; 1 UNTIL COJJNT=0 
= 33 ; 1 END CONVERT.TO.BCD 

34 . 

35 . EOUfiTES 
26 ======= 


0002 

38 Xfl 

EI5U 

R2 

0003 

39 COUNT 

EQU 

R3 

0004 

40 ICNT 

41 ; 

EQU 

R4 

0003 

42 DIGPR: 

EQIJ 

■? 


43 . 

44 $EJECT 

45 TINCLUDErFl COf®CD> 

= 46 

m5 = 47 TEMPI SET R5 

= 48 ; 

= 49 .. 1 CiONVERT,TO.BCD 
= 50 CNBCD 
= 51 ;1 BCDftC:C =0 

0000 28 = 52 XCH R,F!0 

Figure 7 

All mnemonics copyrighted © Intel Corporation 1979. 
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iny 


LOl OBJ 

SEC 

SOURCE 

STHTErCNT 

yfltfl 89 

= ^1? 

MOV 

RLH 

0002 28 

r S 4 

XCH 

H..R0 

0002 eC 02 

= 55 

MOV 

ICNT, #DIi2F*R 

0005 E 100 

= 58 eCOCOP MOV 

0F1- #80 

0087 19 

_ e^-> 

INC 

Pi 

0888 EC05 

_ *rc 

djn: 

ICNT-eCDCOH 


- ^9 

;1 C 01 :NT ^16 


8B18 

- S 0 

MOV 

i-OUNT,. #16 


= fd 

. 1 REPEftT 



= S2 

BCrCCiB. 



= C7 

•2 B:H;=BIN*2 

000«: 97 

r ^4 

CLR 

C 

0800 P7 

= 

RLC 

ft 

00E€ 20 

^ SS 

XCH 


000E F7 

= 67 

RLC 

ft 

8010 20 

= 63 

XCH 



- 69 

;2 BCD =BCD*2+CHRPV 

0011 28 

= 70 

XCH 

H.R0 

0012 09 

^ 71 

MOV 

Rtft 

0012 28 

= 72 

xi:h 

fi..R0 

0014 BC02 

= 72 

MOV 

ICNT. #OItjPR 

0818 00 

= 74 

MOV 

TEMPI, ft 

0817 FI 

= 75 

B^'tX MOV 

ft.ftRl 

iM8 71 

= 76 

HDX 

ft..0Rl 

ti019 57 

= 77 

Ofi 

ft 

001H Hi 

= 73 

MOV 

i?Rl.ft 

O01B 19 

= 79 

INC 

R1 

081C EC17 

= 30 

DJN2 

ICNT.BCt^ 

001E PO 

= 31 

MOV 

ft. TEMPI 


= 32 

. 2 IF CflRRV FRCiM BCOflCC GOTO 

00 IF Fb24 

= 32 

JC 

BCOCOO 


= 84 

,.2 COUNT = 

COUNT-1 


= 35 

. 1 iJf<T!L COIJNT=0 

0021 EB0C 

= 36 

DJNZ 

COUNT. BCDC:Oe 


002 : 97 = 87 CLR C ; CLEftR CflRiRV TO Iffl)ICftTE WDRlIftL TERHINfiTIW^ 

= 88 ; 1 Et^D CON'v’EPT.TO.BCD 
0024 8:< = 89 ECDCOD PET 

90 

USER S'r'MBiXS 

BCDCOfl ei00^ BCDCOe 000C 8CDC0D 0O24 BCDOi: 8017 CNBCO 8080 CCHiNT 0082 DI»jPR 0882 lUIT 

TEMPI f»005 Xfi 8082 

ftSSEMBlY COMPLETE.. NO ERRORS 


Figure 7 (continued) 

All mnemonics copyrighted © intel Corporation 1979. 
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The conversion of a BCD value to binary is essentially 
the same process as converting a binary value to BCD. 

CONVERT_TO_BINARY 
BIN: = 0 

COUNT: = DIGNO 
REPEAT 

BCDACCUM:=BCDACCUM * 10 
BIN: = 10 * BIN + CARRY DIGIT 
COUNT: = COUNT -1 
UNTIL COUNT=0 
END CONVERT_TO_BINARY 

The only complexity is the two multiplications by ten. 
The BCDACCUM can be multiplied by ten by shifting it 
left four places (one digit). The variable BIN could be 
multiplied using the multiply algorithm already dis- 
cussed, but it is usually more efficient to do this by mak- 


ing the following substitution: 

BIN = 10 * BIN = (2) * (5) * (BIN) = 2 * (2 * 2-1-1) * BIN 

This implies that the value 10 * BIN can be generated by 
saving the value of BIN and then shifting BIN two places 
left. After this the original value of BIN can be added to 
the new value of BIN (forming 5 * BIN) and then BIN can 
be multiplied by two. It is often possible to implement 
the multiplication of a value by a constant by using such 
techniques. Figure 8 shows an 8049 routine which con- 
verts BCD values to binary. This routine differs slightly 
from the algorithm above in that the BCD digits are read, 
and converted to binary, two digits at a time. Protection 
has also been added to detect BCD operands which, if 
converted, would yield binary values beyond the range 
of the result. 


MCS-4?/IJPI-41 fiSSEMaEP. V2. 0 
UX Oe.T SED SOUPCE STflTEtCNT 


1 IMHGPOFILE 

2 $mCUJDE( Fl DjNBIN HED) 

2 ; 


= 4 ; * 

= 5 Ca‘«IN * 

= 6 ; * * 

= 8 ♦ 

= ? i* THIS UlTLITV COff/ERTS ft 6 DIGIT BCD VftLl€ TO BlNflRV * 

= 10..* AT ENTPV * 

= U i * R0= POINTER TO ft PACKED BCD- STRING ♦ 

= 12 i* * 

= 13;* ftT EXIT; * 

= 14.;* ft = U314ER EIGHT BITS OF THE BINfiRV RESIU ♦ 

= 1^. i ♦ Xfi= UPPER EIGHT BITS OF THE BINftPV RESliT * 

= 16 . * C = SET IF OVERFLOW ELSE CLEARED * 

= 17 .;+• ♦ 


= 18 ; ♦***.*i(********+*****$:*‘f:.+-**.+*-4.^^^ 

19 

20 ; 

21 IINCLUDE( Fl CiJNBm PDL> 

= 22 

= 23 . 

= 24 , 1 i;:0NVERT,T0_BINftRV 

= 25 ;1 POINTER© ;=POINTER0+DlGITPftIR-l 

= 26 :1 COUNT =DIGITPflIR 

= 27,1BIN;=0 

= 23 i 1 REPEftT 

= 29 ;2 BIN =BIN*ie 

= 30:2 BIN:=BIN+!1E«(R0)L7-4] 

= 31:2 BIN =eiN*10 

= 32 :2 BIN =BIN+ME!*KR0>[3-^3 
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LtX OBJ SEQ SOURCE STATEMENT 


= .2 P»3INTER0:=POiNTER0-l 

= S4 .2 CaWT:=COUNT-l 
= 35 . 1 UNTIL C0IM=0 
= 3S . I END CONVERT-TO.BINRRV 


E0I.IRTE5 


0002 

48 

41 m 

ErA! 

R2 

0002 

42 cawT 

EQU 

R2 

0004 

42 ICNT 

EQU 

R4 

0002 

44 ; 

45 DIGPR: 

EQU 

i 


46 . 

4? $EJECT 

43 IINCLUDE< F1D2NBIN) 

0005 

= 49 

= 50 TEMPI 

SET 

R5 

0006 

= 51 TEMP2 

SET 

Rl6 


= 52 : 

= 52 ,:i CONVERT.TO.BINARV 
= 54 CO»«IN; 

= 55 .1 POlNTER0:=POINTER0+DlijITPAIR-l 


0000 FS 

= 

56 

mv 

aR0 

0001 0202 

= 

57 

ADD 

a.#DlGPR-l 

0002 A8 

= 

58 

MOV 

R0.A 


= 

59 rl CCHINT:=DIGITPAIR 

0004 8B02 

= 

60 

MOV 

COUNT>#DIGPR 



61 1 BIN =0 


0006 27 

- 

62 

CLR 

A 

0007 AA 

S 

62 

m:iv 

KA.A 


= 

64 . 1 REF'ERT 



= 

65 CONBLP: 



= 

66 ;2 

BIN:=BIN*10 

0008 142B 


67 

CALL 

CONB10 

000A F62ft 

= 

68 

JC 

CONBER 


= 

69 -2 

BIN.=BIN+MEf1(R8)[7-4] 

000«: AD 


70 

m-/ 

TEMPI.. A 

000D F0 

= 

71 

m 

A,0R0 

0Eit€ 47 

= 

72 

SNAP 

A 

000F 530F 

= 

77 

WIL 

A.. #tiFH 

0011 6D 

= 

74 

ADD 

A,. TEMPI 

0012 2fl 

- 

75 

XCH 

A^ X!A 

0012 1200 

= 

76 

ADDC 

A. #00 

0015 2A 

= 

77 

XCH 

a.J<A 

0016 F62A 

= 

78 

1C 

CiJNBER 


= 

79 , 2 

BIN =BIN*10 

0018 142B 

= 

80 

CALL 

Cf#«10 

001fl F62A 

= 

81 

JC 

cor«ER 


= 

82 :2 

BIN =8IN+MEM(R0>[2“0] 

001C AD 

= 

32 

MOV 

TEMPI,. A 

081D F0 

= 

34 

MOV 

H.0R0 

001E 520F 

= 

35 

ANL 

A..#0FH 

0020 6D 

= 

86 

ADD 

a TEMPI 

0021 2A 

r 

37 

XCH 

axA 
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SOURCE STATEMENT 


iny 


LOC OBJ 


SEQ 


0022 

1300 

= 

83 ADDC 

a *00 

0024 

2A 

- 

89 XCH 

A,KA 

0025 

hCaA 

- 

90 JC 

CONBER 




91.: 2 POINTER0; 

=POINTER0-1 

002? 

C8 

= 

92 DEC 

R0 



- 

93 :2 COU»^T :=COUNT-l 




94 .1 5JN1IL COI.WT=0 

0023 

EB08 

= 

95 DJN2 

COUr^T.. CONBLP 



= 

96 .: 1 ENT» CONVERT.TO-BINARV 

002A 

33 

= 

97 DJfCER; RET 



= 9S $EJECT 
= 99 ; 

= m 

= 101 . IJTILITV TO nULTIPLV BIN BV 10 



= 102 .. 

CARRY WILL BE SET 

IF OVERFLOW 0D:URS 

002B AD 

= 103 

= 104 CONB10, 

MOV 

TEMPI. A .. 

SAVE A 

082C 2H 

= 105 

XCH 

aXA .: 

SAVE XA 

002D AE 

= 106 

MCiV 

TEMP2..A 


002E 2A 

= 107 

:CH 

axA 


002E 97 

= 108 , 
= 109 

CLR 

C 


0030 F7 

= 110 

RLC 

A ; 

BIN;=^BIN*2 

0031 2A 

= 111 

XCH 

axA 


0032 F7 

= 112 

RLC 

A 


0033 2A 

= 113 

;CH 

axA 


0034 F646 

s 114 

JC 

CONBIE i 

ERROR ON OVERFLOW 

0036 F7 

= 115 .. 
= 116 

RLC 

A ; 

eiN:=BIN*4 

0037 2A 

= 117 

XC:H 

axA 


0038 F7 

= 118 

RLC 

A 


0039 2R 

= 119 

XCH 

axA 


003A F646 

= 120 

JC 

CONBIE ; 

ERROR ON OVERFLOW 

003C 6C- 

= 121 . 
= 122 

ADD 

aTEMFl 

BIN =BIN*5 

003D 2A 

= 123 

XCH 

A.XR 


003E 7E 

= 124 

ADCC 

A.. TEMP2 


00<F 2A 

= 125 

XCH 

A: XR 


0040 F646 

= 126 

JC 

zmi£ > 

ERROR ON OVERFL04 

0042 F7 

= 127 ; 
= 128 

RLC 

A 

BIN:=BIN*10 

0043 2R 

= 129 

XCH 

axA 


0044 F7 

= 130 

RLC 

A 


0045 2A 

= 131 

XCH 

axA 


0046 83 

= 132 

= 133 CCtNBlE: 

RET 




= 134 
= 135 ; 

136 END 


USER SVMBOLS 

CONB10 002B CONBIE 0046 CONBER 002A COtCIN 0000 CONBLP 8008 COUNT 0003 DIGPR 0083 ICNT 

TEMPI 0005 TENP2 0086 XR 0062 


ASSEMBLY COMPLETE. NO ERRORS 
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CONCLUSION 

The design goals of the full duplex serial communica- 
tions software were realized; if transmission and recep- 
tion are occurring concurrently, only 42 percent of the 
real time available to the 8049 will be consumed by the 
serial link. This implies that an 8049 running full duplex 
serial I/O will still outperform earlier members of the 
family running without the serial I/O requirement. It is 
also possible to run this program in an 8048 or 8748 at 
1200 baud with the same 42 percent CPU utilization. 

The execution times for the other routines that have 
been discussed have been summarized in Table 1. All of 
these routines were written to maintain maximum use- 
ability rather than minimum code size or execution time. 
The resulting execution times and code size are there- 
fore what the user can expect to see in a real applica- 
tion. The results that were obtained clearly show the ef- 
ficiency and speed of the 8049. The equivalent times for 
the 8048 are also shown. It is clear that the 8049 repre- 
sents a substantial performance advantage over the 
8048. Considering, in most applications, that the 8048 is 


the highest performance microcomputer available to 
date, the performance advantage of the 8049 should 
allow the cost benefits of a single chip microcomputer 
to be realized in many applications which up until now 
have required too much “computer power” for a single 
chip approach. 


EXECUTION TIME 
(MICROSECONDS) 



BYTES 

8049 

8048 

MPY8 ! 

21 

109 

200 

DIV 16 

37 

183 MIN 
204 MAX 

335 MIN 
375 MAX 

CON BCD 

36 

733 

1348 

CONBIN 

70 

388 

713 


Table 1. Program Performance 
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